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STARDEFMP.MDL = system user interface definitions 
Version: *v04-000' 


SECS AAA ARERR ARATE RARE RARER AAA AREA EAE AAA 


* ® 
* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY * 
* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * 
° ALL RIGHTS RESERVED * 

® 
* THIS SOFTWARE at FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
* oN LY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH TH * 
* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
TRANSFERRED. ® 

® 

{* pe one oe IN THIS SOFTWARE IS SUBJECT he CHANGE WITHOUT NOTICE * 

{* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 

+ CORPORATION. % 
a é 

{* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS’ * 

+ SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. . 

Sr euenuinessiaentinenenbedenennenebebenadeeeeesenebmedamennssedednmabinendain 


{ 
} FACILITY: VAX/VMS System Macro Libraries 
¢ ABSTRACT: 
{ This file contains the ie source for all user visible operating 
t system interfaces from M to P. 
; ENVIRONMENT: 
{ n/a 
{ 
{oo 
{ 
AUTHOR: The VMS Group CREATION DATE: 11-Aug-1976 
MODIFIED BY: 
v03-055 DAS0002 avid Solom 9-Jul-1984 
Add MNT$V _NOREBUILD to mount “tlegs lLongword. 
v03-054 ACG0432 Andrew C. Goldstein, 6-Jul-1984 16:34 
Add PRC$V_NOPASSWORD “bit to SCREPRC flags 
v03-053 MHB0156 Mark Bramhall 22-May-1984 
} Add SYSUAF_COP record type/id to S$NSARECDEF. 
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V03-052 RLRMVER ah Rappa Rerascs 26-Apr-1984 
Add MECS RCZSMVER® backs RDRXMVE G_1U IMVER, and 
MSGS_MAYAMVER symbols added to $ 


VO3-051 TMHOOS1 Tim Halvo 12-Apr-1984 
Remove $M_ symbols Pa PRVDEF (Vv03-049) ter” bits in 
the second longword, since SOf, cannot generate masks 
for bit offsets greater than 32. 


v03-050 MHB0139 Mark Bramhall 12-Apr-1984 
Add CLISPEC flag to SPRCDEF. 

V03-049 MCNO165 Maria del C. Nasr 09-Apr-1984 
Add mask values to SPRVDEF. 

v03-048 RSHO128 R. Scott Hanna 


28-Mar-1984 
SNSARECDEF Add the Serket type NSASK_PKTTYP_ STATUS and 
remove the record type ACL. 


V03-047 RSHO109 R. Scott Hanna 28-Feb-1984 
SNSARECDEF Change mh field in the security auditing 
record header from a longword to a quadword. 


V03-046 HHO004 Hai Huang 28-Feb-1984 
Add MNTSV_ CLUSTER By cluster-wide mount support. 
V03-045 ROW0318 Ralph 0. Weber 27-FEB-1984 


Add OPCOM message ehdes for theden set mount verification 
messages; MSG$_SHAMEMFAL, member failed out of shadow set, and 
MSG$_SHARDUCED; shadow set reduced. 


VO3-044 MMD0241 Meg Dumont, 24-Feb-1984 11:15 
Add MTADEF codes to suppor the mag tape accessibility routine. 
V03-043 RSHO097 R. Scott Hanna 02-Feb-1984 
Replace SNSARECDEF. 
v03-042 KPLO002 Peter Lieberwirth 2-F eb-1984 
Add SPRENNDEF for Nautilus. 
v03-041 ACG0386 Andre Goldstein, 10-Jan-1984 16:29 
Add PRC$V_PASSWORD to “sCREPRC flags 
V03-040 RLRPRBSS2 Robert L, Rappaport 9-Dec-1983 
Additional minor corrections to $PR8SSDEF. 
v03-039 DAS0001 David Solom 29-Nov-1983 
Add MNTS_ JRNLRECORD.. SIZE foe specifying max journal recordsize 
on MOUNT. 
VO3-038 RLRPRB8SS1 Robert 4. Rappaport 28-Nov-1983 
Modify SPR8SSDEF according to new Scorpio spec. 


AAA AAAAAAAAAAAAAAAA AAA AAAAAAAAAAAAAAAAAAAAAAAA AA AAAAAAA 


v03-037 RLRPRBSS tt. Rappaport 11-Nov-1983 
Add $SPR8SSDEF hes” corp o specific registers. 
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v03-036 KPLOO001 Peter Lieberwirth 88-Nov-1983 
Add PRS_SID_TYP8SS for rie PR$_SID_ TYPBNN for Nautilus. 


v03-035 TMK0001 Todd 27-0¢t-1983 
Add the process quota "lar code PQL$_JTQUOTA. 


vU3-034 KDM0075 Kathleen D. Morse 23-Aug-1983 
Update PRS_TYPMAX to 


VO3-033 CWH1011 CW Hobbs 18-Aug-1983 
Add MSG$_CLUMBX and MSGS. TM78MVER messages. 


v03-032 KDM0067 Kathleen D. Morse 4A a hag 
Add roceseerwepest iss IPR macros for Micro-VAX, SPRUVIDEF 
and SPRUV2DEF. 


vO3-031 $B8L0031 Steve Lionel 29-Jul-1983 
Add comment to SPRVDEF about updating CRIL.SRCILIBLEXICA.B832. 


v03-030 wMC0030 Wayne Cardoza 28-Jul-1983 
PRCDEF item codes for logical name attributes. 


v03-029 MMD0191 Dum 28-Jul-1983 9:49 
Changed bit in ves EF roan AUTO to NOAUTO to make aoe © tape 
AVL/AVR consistent between DCL and MOUNT ae service 


v03-028 a Kathleen D. Morse Lied -1983 
d epurdependent. PR definitions: $PR7 doer SSPR?SODEF, 
$PR7 DEF, and SPR790DEF. Remove ACCS, ACCR 
ICR, and NICR from SPRDEF and add to Shcduatogent IPRe. 


V03-027 MLJ0114 Martin L. Jack 22-Jun-1983 
Add MSG$_GETQUI. 
v03-026 RSHO035 R. 16-Jun-1983 


Sco 
Provide permanent fix. ioe MO NSARECDEF symbols. 


v03-025 ADE9001 G ler idge 27-May-1983 
Temporary antitiect ons to S$NSARECDEF to elles build 
to proceed. 

v03-025 RSHO023 Scott Hanna 24-May-1983 
Add SNSARECDEF omits Auditing record def izitions) 

v03-024 RSHOO018 Scott Hanna 21-May-1983 
Add SECURITY <ptioegl A SPRVDEF 

vO3-023 KDM0046 hleen D. Mors 20-May-1983 
Add Micro-VAX ion git Ah to *SPRDEF. 

v03-022 PRBO172 aul Bec 26-Apr-1983 

Add TMPJNL and PRRINL ei shiens 
vO3-021 wMC0017 Wayne Cardoza 10-Apr-1983 


Add IMGDMP flag to PRCDEF 


RASA AAAAAAAAAAAAAAAAAOAAAAA AAA AAPA AAA ALAAPAAAAAAMAAAAAAN 
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v03-020 mMD0111 ont, 25-Mar-1983 9:51 
Added MNTDEF bite A. "eeu mount qualifiers 


v03-019 wMC0016 Wayne Cardoza 08-Mar-1983 
Add item codes to PRCDEF 
v03-018 wMC0015 e Cardoza 06-Mar-1983 
Add PRCSV_INTER ony reRCSV DETACH 
v03-017 LMP0083 L. Mark Pilant, 28-Feb-1983 9:54 


Add a blurb that indicates what modules must be changed when 
privileges are added. 


vO3-16 LMP0082 Mark Pilan 28-Feb-1983 8:41 
Add difinitions “, the tol lowing privileges: UPGRADE, 
DOWNGRADE, GRPPRV, and READAL 


v03-015 JLV0233 24-F EB-1983 
Add definition Sey SHARE g PENS 
VO3-014 wMC0014 Wayne Cardoza 04-Jan-1983 


Add 790 scratchpad registers to PRDEF. 


v03-013 RLRDENS Robert L. Rappaport 21-Dec-1982 
Add density support bit fields to MTIDEF. These bits 
will tell what densities are supported on a drive. 


v03-012 TCMO0004 rudy C. Matthews 13-Dec-1982 
Add PR$_STXCS sal "PR _STXDB definitions. ats 

v03-011 ACG0303 Andrew C. Goldstein, 9-Dec-1982 16:06 
Add FILL attribute to extraneous field names 

v03-010 RLRSPEEDA Robert Rappaport 09-Nov-1982 
Corrected Speed detinition in MIDEF. 

v03-009 TCM0003 Trudy C. Matthews 02-Nov-1982 
Changed PR$_SID_TYP7VV to PRS. SID_TYP790. 

v03-008 RLRSPEED Robert L. Respepors gi-tet= 1982 
Add Speed field and speed values to MTDEF 

v03-007 MLJ0097 Martin L. Jack, 99-Sep-1982 16:38 


Add MSG$_SNDJBC. 


VO3-006 RLRSEREX Robert L. Rappaport 26-Aug-1982 
Remove MTSM_CLSEREXCP. 


v03-005 $TJ0320 Steven T. Jeffreys 25-Au ug ee 
Add support for recovery unit journalling in SMOUNT. 
v03-004 RLROOO!1 Robert Rappaport 4-Aug-1982 
Add serious exception b ts to MIDEF 
v03-003 TCM0002 Trudy C. Matthews 28-Jul-1982 
Replace 11/790-specific Internal Processor Register definitions. 


STA 
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v03-002 $TJ0307 Steven T. Jeffreys 18-May-1982 
Added MNTS$V_NOUNLOAD. 

v03-001 RLRV3A1 gags ort 5-Apr-1982 
Added MSG$ _UDASOMVER. Sad “MSG$_DUPUNI TNO. 


STARDEFMP.SDL;1 
module SMNTDEF; 
{e+ 


/t 
. FLAG BITS FOR THE SMOUNT SYSTEM SERVICE. 
/*- 


everegete MNTIDEF union prefix MNT$; 

MNTDEF BITS pyrycture fill; 
FOREIGN bitfield mask; 
GROUP eer iet? mask; 
NOASSIST bis eld mask; 
NODISKQ b tfield mask; 
NOHDRS bitfield mask; 
NOLABEL bitfield mask; 
NOWRITE bitfield mask; 
OVR_ACCESS bitfield mask; 
OVR_EXP bitfield mask; 
OVR_IDENT bitfield mask; 
OVR_SETID bitfield mask; 
REABCHECK bitfield mask; 
SHARE bitfield mask; 
MESSAGE bitfield mask; 
SYSTEM bitfield mask; 
WRITECHECK bitfield mask; 
WRITETHRU bitfield mask; 

CACHE bitfield mask; 

OVR_LOCK bitfield mask; 
NOMNTVER bitfield mask; 
NOUNLOAD bitfield mask; 
NOJRNL bitfield mask; 
NEWJRNL bitfield mask; 
NOAUTO bitfield mask; 
INIT_ALL bitfield mask 
INIT~CONT bitfield mask; 
OVR_JOLO bitfield mask; 
INTERCHG bitfield mask; 
CLUSTER bitfield mask; 
NOREBUILD bitfield mask; 

end MNTDEF _BITS; 


ft 
yd Item codes for mount parameters. 
constant ( 
DEV 
VOLNAM 
ACCESSED 
PROCESSOR 
VOLSET 
BLOCKSIZE 
DENSITY 


ss *e* 8 8 &© & & 
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FOREIGN OPTION SELECTED 
GROUP OPTION SELECTED 
NOASSIST OPTION SELECTED 
NODISK@ OPTION SELECTED 
NOHDRS OPTION SELECTED 
NOLABEL OPTION SELECTED 
NOWRITE OPTION SELECTED 
OVERRIDE ACCESSIBLITY OPTION SELECTED 
OVERRIDE EXPIRATON OPTION SELECTED 
OVERRIDE VOLUME LABEL 
OVERRIDE VOLUME SET IDENT OPTION SELECTIED 
READCHECK OPTION SELECTED 
SHARE OPTION SELECTED 
ALLOW SMOUNT TO PRINT MESSAGES 
SYSTEM OPTION SELECTED 
WRITECHECK OPTION SELECTED 
WRITETHRU OPTION SELECTED 
TURN OFF ALL CACHING 
OVERRIDE AUTOMATIC WRITE-LOCK 
DISABLE MOUNT VERIFICATION 
DO NOT UNLOAD VOLUME AT DISMOUNT 
DO NOT ACTIVATE RECOVERY UNIT JOURNAL FILE 
CREATE A_NEW RECOVERY UNIT JOURNAL FILE 
DO NOT SET THE MTAACP INTO AVR AND AVL MODE 
NITIALIZE ALL_ VOLUMES IN SET BEFORE WRITING 
NITIALIZE CONTINUATION VOLUMES BEFORE WRITING 
OVERRIDE VOL1 VOLUME IDENTIFIER FIELD 
VOL FOR INTERCHG NO VMS SPECIFIC INFO WRITTEN TO TAPE 
CLUSTER-WIDE MOUNT OPTION SELECTED 
O NOT REBUILD VOLUME 


DEFINE CODES AS CONSTANTS 
DEVICE NAME 

VOLUME NAME 

LOGICAL NAME 

MOUNT FLAGS 

ACCESSED VALUE 

PROCESSOR NAME 


VALUE 
TY VALUE 
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+ EXTENT /* NUMBER OF EXTENT CACHE ENTRIES 
» FILEID /* FILE , CACHE SIZE 

» LIMIT /* EXTENT CACHE LIMIT 

» OWNER /* VOLUME OWNER UIC 

» VPROT /* VOLUME PROTECTION 

+ QUOTA /* QUOTA CACHE SIZE 

» RECORDSIZ /* RECORD SIZE VALUE 

» WINDOW /* NUMBER OF WINDOWS 

» EXTENSION /* DEFAULT FILE EXTENSION 

» VISUAL_ID /* VISUAL IDENTIFICATION 

. nT /* USER COMMENT 

» JRNLSIZE /* INITIAL JOURNAL SIZE 

» JRNLEXTEND /* JOURNAL EXTENSION QUANTITY 

+ JRNLQUOTA /* JOURNAL BYTE QUOTA (PER R.U.) 
; JRNLRECORD_SIZE /* JOURNAL MAXIMUM RECORD SIZE 


equals 1 increment 1 prefix MNT tag $; 
end MNTDEF; 


end_module SMNTDEF ; 


STARDEFMP.SDL;1 
module SMSGDEF; 
/e+ 


/* 
. SYSTEM WIDE MAILBOX MESSAGE TYPES 


/*= 


constant 
TRAUNSOLIC 
CRUNSOLIC 
DELPROC 


ND 
DEVOFFLIN 
TRMHANGUP 


se. 8 8 &© & & 


re 


equals 1 increment 1 prefix MSG tag $; 


constant ( 
N 


j equals 8 increment 1 prefix MSG tag $; 


constant ( 
M_AT 
} equals 11 increment 1 


constant ( 
INIOPR 
ABOOPR 


REQUE 
$ equals 


16 increment 1 
constant ( 
SMBRSP 
ACCRSP 
} equals 32 increment 1 
constant ( 
sc 


SCANRSP 
j equals 40 increment 1 


prefix MSG tag $; 


prefix MSG tag $; 


prefix MSG tag $; 


prefix MSG tag $; 
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DEFINE CODES AS CONSTANTS 


UNSOLI ERMINAL DATA 
UNSO D READER DATA 


Ll 
DELETE 
SEND T ONT MANAGER 
DEVICE 
TERMIN 
DEVICE 
OPERATOR REQUEST *** OVERLAPPED CODE *** 
OPERATOR REPLY *** OVERLAPPED CODE *** 
DEFINE SYMBIONT RESPONSE MESSAGES 
SYMBIONT yee INITED 
SYMBIONT FINISHED 
SEND MESSAGE TO ACCOUNTING MANAGER 
PURGE PROCESS *** OVERLAPPED CODE *** 
DELETE IMAGE *** tt tt CODE *** 

PURGE PPED CODE *** 

SYSTEM FUNCTION *** OVERLAPPED CODE *** 
Send message to job controller 

Get queue information (from Job controller) 
DEFINE DMC MESSAGES 

+43 ures tsi Tee DATA 

DMC ATTENTION MESSAGE 


SYMBIONT COMMAND MESSAGES 


ABORT 
RUSE P 


SYMBIONT MANAGER RESPONSE 
ACCOUNTING MANAGER RESPONSE 


FILE ACP MESSAGES 


SCAN FILE FOR BAD BLOCKS 
RESPONSE FROM FILE SCANNER 


NETWORK ATTENTION CODES 


STARDEFMP.SDL;1 


constant ( 


EVTA 
EVTRCVCHG 
INCDAT 
LINUP 


LINDWN 
EVTXMTCH 
poe 


—ese e© es 8 ee See Se see ses Se Se esses st & 


i increment 1 prefix MSG tag $; 


constan 
DEVOE FLINx 
VOL 


saeesre 25 
nani 
Fad 


—s 


equals 80 increment 1 
end_module SMSGDEF ; 


prefix MSG tag $; 
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PARTNER ABORTED LINK 

CONNECT CONFIRM 

INBOUND CONNECT INITIATE 
PARTNER DISCONNECTED = HANGUP 
PARTNER Btaree PREMATURELY 
INTERRUPT MESSAGE = UNSOLICITED DATA 
FW = PATH LOST TO PARTNER 
PROTOCOL es 

owt REJECT 

HIRD PARTY pi acome ECT 


TH 

CONNECT TIME 
Network shutt . down 

Node has become accessible 
Node has becom 
Events are ava 


inaccessible 
lable to EVL 


Event cece tyer api tenese change 
: i INCOMI ATA 


CIRCUIT waeset 
PVC LINE U 


5 pvc CINE DOWN 
Event transmitter database change 


MOUNT VERIFICATION MESSAGES 
peice weet 


LUME DI 
UDASO MICORCODE NOT UPTO REV 
MSCP CONTROLLER - DUPLICATE UNIT ! 
CNXMGR to OPCOM messages 
TM78 Microcode not up to rev level 
Henber failed ove of shadow set 
Hf Ow set reduc 
3 MICORCODE NOT ere REV 
ICORCODE N PTO REV 
ICORCODE NOY U UPTO REV 
ICORCODE NOT UPTO REV 
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gogute SMTADEF ; 
S MAGTAPE ACCESSIBILTY ROUTINE CODES 


aggregate MTADEF union prefix MTA$; 
/* DEFINITIONS FOR ACCESS_SPEC 


constant NOCHAR equals prefix MTA tag SK; /* ACCESS CHAR IS NOVALID 
constant CHARVALID equals prefix MTA tag SK; /* ACCESS CHAR IS VALID 

/* DEFINITIONS FOR 1YPE 
constant INVOL1 equals 0 prefix MTA tag SK; /* INPUT A VOL1 ACCESS CODE 
constant INHDR1 equals 1 prefix MTA tag $K; /* INPUT A HDR1 ACCESS CODE 
constant OUTVOL1 equals § prefix MTA tag SK; /* QUTPUT A VOL1 ACCESS CODE 
constant OUTHDR1 equals prefix MTA tag SK; /* OUTPUT A HDR1 ACCESS CODE 


end MTADEF; 
end_module SMTADEF ; 
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nodule SMTDEF; 
MAGTAPE STATUS BITS 


aggregate MIDEF union prefix MT$; 

MIDEF_BITS ercusture fill; 
SEREXCP bts eld mask; /* SERIOUS EXCEPTION PRESENT 
FILL_1 bitfield fill prefix MTIDEF tag $$; /* SPARE UNUSED BIT 
ENSEREXCP Oity sete mask; /* cMARLE SERIOUS gecee tigen MODE 
PARITY bitfield mask; /* PARITY SELECT (O=0DD, 1=EVEN) 
FORMAT bos tiee mask Length 4: /* RECORDING FORMAT 
DENSITY » ttield mask peggth . /* RECORDING DENSITY AND METHOD 
FILL_2 b Fiigté fill prefix MTDEF tag $$; /* SPARE UNUSED 33" 
LOGSOFT bitfield mask; /* LOG SOFT (TU78) ERRORS (O=NO, 1=YES) 
LOGSOFTOG bitfield mask; /* TOGGLE TO REVERSE LOGSOFT STATE BIT 
BOT bitfield mask; /* AT BEGINNING OF TAPE 
EOF bitfield mask; /* AT END OF FILE 
EOT bitfield mask; /* AT END OF TAPE 
HWE bitfield mask; /* TAPE IS HARDWARE WRITELOCKED 
LOST bitfield mask; /* TAPE POSITION LOST 
SUP_NRZI bitfield mask; /* DRIVE SUPPORTS NRZI (500 BPI) 
SUP_PE bitfield mask; /* DRIVE SUPPORTS PE (1600 BPI) 
SUP~GCR bitfield mask; /* DRIVE SUPPORTS GCR (6250 BPI) 
SPEED bitfield mask Length 8; /* TAPE SPEED 

end MIDEF_BITS; 


/* 
i. RECORDING FORMAT DEF INTIONS 


/ 
constant ‘‘DEFAULT'' equals 0 prefix MT tag $K; /* DEFAULT FORMAT 
constant NORMAL11 equals 12 prefix MT tag SK; /* PDP-11 NORMAL 
constant CORDMP11 equals 135 prefix MT tag $K; /* PDP-11 CORE DUMP 
constant NORMAL15 equals 14 prefix MT tag SK; /* PDP-15 NORMAL 


fe 
a RECORDING DENTITY AND METHOD DEFINITIONS 


/t 

DEFAULT,0O /* DEFAULT DENSITY (sane AS ABOVE) 
constant NRZI 5 0 equals i prefix MT tag $K; /* NRZ BPI 
constant PE 16 equals prefix MT tag $K; /* PE 1600 BPI 
constant GCR_6250 equals 5 prefix MT tag $K; /* GCR 6250 BPI 


/* 
a TAPE SPEED VALUE DEFINITIONS 


constant Speed DEF equals prefix MT tag SK; /* DEFAULT SPEED 
constant SPEED _¢ equals 25 prefix MT tag SK; /t IPS 
constant SPEED_75 equals 75 prefix MT tag $K; /* IPS 


end MIDEF; 
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end_module SMTDEF; 
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module S$NSARECDEF; 
{xe 
Security Auditing record definitions 


prefix NSA$; /* Maximum record size 
prefix NSA$; /* Maximum record size 
prefix NSA$; / 


constant REC_MAXLENGTH equals 1034 tag 
* Maximum record size 


constant REC_MAXLENGTH equals 1024 tag 
constant REC_MAXLENGTH equals 1024 tag 


YAaRKo 


Jee 
. Audit record type definitions 


constant (RECTYP_FIL, /* File access 

RECTYP_SYSUAF, /* System UAF 
RECTYP_NETUAF, /* Network UAF 
RECTYP_LOGB, /* Login breakin detection 
RECTYP_LOGI, /* Successful login 
RECTYP_LOGF, /* Login failure 
RECTYP_LOGO, /* Logout 

RECTYP_VOL) /* Volume operations 
equals T increment 1 counter #TYPNUM prefix NSAS; 


constant RECTYPNUM equals #TYPNUM prefix NSAS; 


{t+ 
- Audit record subtype and ID definitions 


/* File access 

constant (RECTYP_FIL_SUCC /* Successful file access 
RECTYP FIL-FAILS /* File access failure 
equals T increment 1 counter #SUBTYPNUM prefix NSAS; 

constant RECTYPNUM_FIL equals #SUBTYPNUM prefix NSAS$; 


F 
ait equals NSASK_RECTYP_FIL+(65536*NSASK_R 


constant RECID_FIL_ -RECTYP_FIL_SUCC) prefix NSA$; 
constant RECID_FIL_FAIL equals NSASK_RECTYP_FIL+(65536*NSASK_RECTYP_FIL_FAIL) prefix NSA$; 
/* System UAF 
constant (RECTYP_SYSUAF_ADD, /* System UAF record addition 

RECTYP_SYSUAF_DEL, /* System UAF record deletion 

ECTYP_SYSUAF_MOD /* System UAF record modification 


R e 

RECTYP_SYSUAF _ COP /* System UAF record copied 

RECTYP SYSUAF ~RENS /* azeten UAF posers renamed 

equals T increment 1 counter #SUBTYPNUM prefix NSA$; 
constant RECTYPNUM_SYSUAF equals #SUBTYPNUM prefix NSA$; 


constant RECID_SYSUAF_ADD equals NSASK_RECTYP_SYSUAF +(65536*NSASK_RECTYP_SYSUAF_ADD) prefix NSA$; 
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constant RECID_SYSUAF_DEL equals NSASK_RECTYP STSUAFS (6 NAS K_RECTYP_SYSUAF_DEL) 
constant RECID- SYSUAF —MOD equals NSASK_ “REE TYE =BYSuar +8 NAS K-RECTYP_SYSUAF_MOD) 
constant RECID-SYSUAF_COP equals NSASK_RECTYP_SYSUAF +( *NSA SR REC TYE AS VSUAE COP) 
constant RECID-SYSUAF_REN equals NSASK_RECTYP_SYSUAF+(6 *NSASK_RECTYP_SYSUAF_REN) 


/* Network UAF 


constant 


constant 


constant 
constant 
constant 


/* Login 
constant 


constant 


constant 
constant 
constant 
constant 
constant 


/* Network UAF record addition 


/* Successful login 


constant 


constant 
constant 
constant 
constant 
constant 


RECTYP_NETUAF_DEL /* Network UAF record deletion 
RECTYP ThG tua “MODS /* Network UAF record modification 

equals T increment 1 counter #SUBTYPNUM prefix NSAS; 

RECTYPNUM_NETUAF equals #SUBTYPNUM prefix NSA$; 

RECID_NETUAF_ADD equals NSAS$SK =Rectye NE TUAF +(65536*NSASK_RECTYP_NETUAF_ADD) 

RECID_ _NETUAF “DEL equals NSASK_RECTYP_NETUAF +(65536*NSASK_ RECTYP_NETUAF _DEL) 

RECID_NETUAF “MOD equals NSASK_RECTYP_NETUAF +(655356*NSASK_ RECTYP_NE. UAF_MOD) 

breakin detection 

(RECTYP_LOGB_DIA, /* Dialup interactive breakin detection 

RECTYP_LO “LOC; /* Local interactive breakin detection 
Reet e ot cemenene /* Remote interactive breakin detection 
RECTYP_LOGB_NET /* Network breakin detection 
RECTYP-LOGB_ “DETS /* Detached process breakin detection 

equals T increment 1 counter #SUBTYPNUN prefix NSA$; 

RECTYPNUM_LOGB equals #SUBTYPNUM prefix NSAS; 

RECID_LOGB_DIA equals NSASK =ReCtve CL ett -RECTYP_LOGB_DIA) prefix 
RECID_LOGB_ a equals NSASK_RECTYP +(65536*NSASK_RECTYP_LOGB_LOC) prefix 
RECID-LO equals NSASK-RECTYP“LO GBs (658 SENSASKTRECTYP“LOGE-RERD prefix 
RECID-LO “NET equals NSASK_RECTYP_ toes (858 6*NSASK_RECTYP_LOGB_NET) prefix 
RECID-LOGB-DET equals NSASK_RECTYP_LOGB+(65536*NSASK_RECTYP_LOGB_DET) prefix 
(RECTYP_LOGI_BAT, /* Batch process login 

RECTYP"LOGI-DIA, /* Dialup interactive login 
RECTYP_LOGI_LOC, /* Local raagieet Login 
RECTYP_LOGI_REM, /* Remote Interact ve login 
REC Li ¢ LOGI _NET, /* Network lo 
RECTYP_LOGI~ SUB /* suserecess ae 
RECTYP-LOGI—~DETS /* d° process Login 

equals T increment 1 counter #SUBTYPNOA” ore ix NSA$; 

RECTYPNUM_LOGI equals #SUBTYPNUM prefix NSAS$; 

RECID_LOGI_BAT equals NSASK_RECTYP “1061 +(83 *NSASK_RECTYP_LOGI_BAT) prefix 

RECID-LOGI-“DIA equals NSASK_RECTYP_LOG *NSASK_RECTYP_LOGI-DIA) prefix 

493 ee equals NSASK_RECTYP_ ane *NSASK_RECTYP_LOGI_LOC) prefix 

RECID LOGI _R EM equals NSASK_RECTYP— Har *NSASK_RECTYP_LOGI_REM) prefix 

RECID-LOGI“NET equals NSASK_RECTYP_LOGI +( *NSASK-RECTYP_LOGI-NET) prefix 


prefix 
prefix 


prefix 
prefix NSA 


prefix 
prefix 
prefix 


NSAS; 
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constant RECID_LOGI_SUB equals NSASK_RECTY GI+( *NS Tye LOG! SUB) prefix NSA$; 
constant RECID_LOGI_DET equals NSASK_RECTY Oeie esesceneate TYP_LOGI-DET) prefix NSAS; 
/* Login failure 
constant nee lve _LOGF _BAT, /* Batch process login failure 
RECTYP-LOGF DIA, /* Dialup interactive Login, t¢ failure 
RECTYP_LOGF _LOC, /* Local interact ye login ure 
RECTYP_LOGF_REM, /* Remote Interac | aS Login ta lure 
RECTYP_LOGF_NET, /* Network Login fait 
RECTYP_LOGF _SUB /* guperecess Login ait re 
RECTYP-LOGF -DETS ached process login failure 


LOGF_ /* 
equals T increment 1 counter #SUBTYPNUM prefix NSA$; 
constant RECTYPNUM_LOGF equals #SUBTYPNUM prefix NSAS$; 


constant RECID_LOGF_BAT equals NSAS$K Retire LOGF +(65536*NSASK_RECTYP_LOGF_BAT) prefix NSAS$; 
constant RECID_LOGF_DIA equals NSASK_RECTYP_LOGF+(65536*NSASK_RECTYP_LOGF_DIA) prefix NSA$; 
constant RECID-LOGF-LOC equals NSASK_RECTYP_LOGF+(65536*NSASK_RECTYP_LOGF_LOC) prefix NSAS; 
constant RECID-LOGF-REM equals NSASK_-RECTYP LOGE +(655 36*NSASK_RECTYP_LOGF_REM) prefix NSAS: 
constant RECID_LOGF_NET equals NSASK_RECTYP_LOGF+(65536*NSASK_RECTYP_LOGF_NET) prefix NSAS; 
constant RECID_LOGF_SUB equals NSASK_RECTYP_LOGF+(65536*NSASK_RECTYP_LOGF_SUB) prefix NSAS; 
constant RECID_LOGF_DET equals NSASK_RECTYP_L LOGE s (65S36"NSASK-RECTYP“LOGE~DETD prefix NSA$; 
/* Logout 
constant (RECTYP_LOGO_BAT, /* Batch process logout 

RECTYP-LOGO_DIA. /* Dialup interactive logout 

RECTYP_LOGO_LOC, /* Local interactive logout 

RECTYP_LOGO_REM, /* Remote interactive logout 

RECT VE OGO_NET, /* Network logout 

RECTYP_LOGO_ SUB /* guberecess logou 

RECTYP-LOGO_DETS ched process * Logout 


/* Det 
equals T increment 1 counter #SUBTYPNUN prefix NSA$; 
constant RECTYPNUM_LOGO equals #SUBTYPNUM prefix NSA$; 


constant RECID_LOGO_BAT equals WeARK -RECTYP_LOGO+(655356*NSASK_RECTYP_LOGO_BAT) prefix NSAS$; 
constant RECID_LOGO_DIA equals NSASK_RECTYP_LOGO+ (633 6*NSASK_RECTYP_LOGO_DIA) prefix NSAS; 
constant RECID_LOGO_LOC equals NSASK_RECTYP_LOGO+(655356*NSASK_RECTYP_LOGO_LOC) prefix NSAS; 
constant RECI REM equals NSASK_RECTYP_LOGO+(65536*NSASK_RECTYP_LOGO_REM) prefix NSAS; 
constant RECID 2 equals NeASE REET YP" ocos (ees aseh K_RECTYP_LOGO_NET) prefix NSA$; 
constani RECID_LOGO_ equals NSA$K_RECTYP_LOGO+( *NSASK_RECTYP_LOGO_ SUB) pretix NSAS; 
constant RECID_-LOGO_DET equals NSASK_RECTYP_LOGO+(65536*NSASK_RECTYP_LOGO_DET) prefix NSAS; 
/* Volume operations 

constant (neerve _VOL_MOU, /* Volume mounts 

RECTYP~ VOL “DMOU) /* Volume dismounts 


equals T intrement 1 counter #SUBTYPNUR" prefix NSA$; 
constant RECTYPNUM_VOL equals #SUBTYPNUM prefix NSAS$; 
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constant RECID_VOL_MOU equals NSASK_RECTYP_VOL+(65536*NSASK_RECTYP_VOL_MOU) pretis NSAS; 
constant RECID-VOL-DMOU equals NSASR_REC TYP -VOL+(65536"NSASR_RECTYP_VOLC_DMOU) prefix NSAS; 


/v+ 
An Record header offset definitions 


aggregate NSARECHDRDEF structure prefix NSAS$; 


REC_ID OVERLAY union tie 
“REC_LID | 


C_SUBTY 
REC_ 1D 4 rte 


& 
REC_SEQLAST yte uns gned 
REC =FLAGS Ov ove LAY union fill: 


F byte unsigned; 
REC “FLAGS TS structure fill; 


REC_FLAGS BITS; 
FLAGS OVERLAY; 

TRUM byte unsigned; 
OFF word unsigned; 
KTHDRSIZ word unsigned; 
EPID a et unsigned; 
EF IME +e word unsigned; 
Re character ength 


end 
RE C 
_PKT 
~PKT 
c-PK T 


EC 
C 


constant RECHDR_LENGTH equals . tag 
constant RECHDR_LENGTH equals . tag 


/* 


/* 
/* 


Record identification Longword 
Record type 

Record subtype 

This records sequence number 
Last records sequence number 


Record flags byte 


B 
REC_FCAGS_PKTCON bitfield Length 1 mask; /* Last packet in record is 


/* continued in next record 


Number of data packets in record 
Offset to first packet 

Data packet header size 

Extended PID 

Event time (EXESGQ_SYSTIME) 
Cluster node name 

Process name 

username 

Account name 


con: 


end NSARECHDRDEF ; 


{e+ 
. Data packet type definitions 


constant (PKTTYP_ ee /* Image name packet 
PKTTYP_FACMO: /* File access mode 
PKTTYP ~pRivuseD, /* Privilege used to access file 
PKTTYP_FILNAM, /* File name 
PKTTYP_DEVNAM, /* Device name 
PKTTYP_L /* Logical name 
PKTTYP_VOLNAM, /* Volume name 
PKTTYP_VOLSNAM, /* Volume set name 
PKTTYP_NODENAM, /* Node name 
PKTTYP_USERNAM, /* User name 
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/ 
equals T increment 1 counter #PKT 
constant PKTTYPNUM equals #PKTTYPNUM prefi 


{e+ 
Data packet offset definitions 
t=. 


#PKTHDRBEG = .; 
PKT_TYPE word unsigned; 
PKT_SIZE word unsigned; 


PKT_DATA character Length 0; 


PKT_DATA_OVERLAY union fill; 
PKT_T 


PKT- STATUS Longword unsigned; 
end PKT~DATA_OVERLAY; 
end NSAPKTDEF ; 


end_module SNSARECDEF ; 


PKTTYP_PASSWORD, /* Password 

PKTTYP_UIC /* User identification code 
PKTTYP~VOLPRO, /* Volume protection 
PKTTYP_MOUFLG /* Mount f a 
PKTTYP-DMOUFLG, /* Dismount flags 
PKTTYP_NODEID, /* Node ID 

PKTTYP_EPID /* Extended PID 
PKTTYP~SYSUAFF , /* System UAF record fields 
PKTTYP_STATUS) * tus longword 


Sta 
TYPNUM prefix NSA$; 


x NSAS; 


/* 
/* 


constant PKTHDR_LENGTH equals .-#PKTHDRBEG tag 
constant PKTHDR_LENGTH equals .-#PKTHDRBEG tag 


aggregate NSAPKTDEF structure origin PKT_DATA prefix NSA$; 


Packet data type 
Packet size 


C; 
K; 


* character Length 444; /* Image name 
PKT_FACMOD longword unsigned; /* File access mode : 
PKT_PRIVUSED Longword unsigned; /* Privilege used to access file 
PKT_FILNAM character Lengt 44h; /* File name 
PKT_DEVNAM character length 15; /* Device name 
PKT_LOGNAM character Length #55; /* Logical name 
PKT_VOLNAM character ‘ength 12: /* Volume name 
PKT_VOLSNAM character length 12; /* Volume set name 
PKT_NODENAM character Length 6; /* Node name 
PKT-USERNAM character length "ei /* User name 
PKT“PASSWORD character length 31; /* Password 
PKT_UIC Longword unsigned; /* Volume UIC 
PKT_VOLPRO word unsigned; /* Volume protection 
PKT_MOUFLG Longword unsigned; /* Mount flags 
PKT_DMOUFLG word uns 'one 3 /* Dismount flags 
PKT_NODEID quadword unsigned; /* Node ID 
PKT_EPID lLongword unsigned; /* Extended PID 
PKT_SYSUAFF quadword unsigned; /* sresee UAF record fields 

/* Status longword 
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module SOPRDEF ; 


{re 
ie OPERATOR COMMUNICATIONS MESSAGE TYPES AND VALUES 
/* OPERATOR MESSAGE TYPES 


constant ( 
TERMENABL /* ENABLE TERMINAL 
» LOGINIT /* INITIALIZE THE LOG 
. OPRQST /* OPERATOR REQUEST 
OPREPLY /* OPERATOR REPLY 


j equals 1 increment 1 prefix OPR tag $; 


aggre ate. sii ¥ union pretit. OPRS; 
OPRDE 
asaL $ prevecyes. 


RAL b pf /* 
See nck bitfield mask: 
TAPES bitfield mask; 
DISKS bitfield oe 
DEVICES bitfield m 
USER1 bitfield mask *{éngth 12; 
bene bitfield m 
USERS bitfield ne 
USERS bitfield mask; 
USERS bitfield mask; 
thy bitfield mask; 
USER? bitfield mask; 
USERS bitfield mask; 
USER bitfield mask 
USERI0 bitfield mask; 
USER11 bitfield mask; 
USER12 bitfield mask; 
OPRDEF _BITS; 


end 
end OPROEF ; 
end_module SOPRDEF ; 
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module SPCCDEF; 
/%+ 
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be PRINTER/TERMINAL CARRIAGE CONTROL SPECIFIERS 


aggregate PCCDEF Strycture prefix PCC$; 
FORTRAN word unsigned; 
‘PREFIX'’ byte unsigned; 
POSTFIX_OVERLAY union fill; 
POSTFIX yke unsigned; 
POSTFIX_BITSO structure fill; 
CHAR mask Len 
eld fill 
jeld mas 
mask; 


ure fill; 


ae 


equals 
equals 
equals 
equals 
equals 


i 
t 
b 
t 
] 
i 
I 
Ss 
DOUBLE 
PAGE 


end_module SPCCDEF; 


3 
4 
4 
4 
3 


3 
6 


gth 5; 
refix PCCDEF tag $$; 


mask Length 7; 


/* 


/* 
prefix PCC tag $ 
prefix PCC tag $;/* 
prefix PCC tag $;/* 
prefix PCC tag $;/* 
prefix PCC tag $;/* 


FORTRAN FIELD 
PREFIX FIELD 


POSTFIX FIELD 
/* CHARACTER FIELD 

* EIGHTBIT CHARACTER SET 
SINGLE CHARACTER 

LINE COUNT FOR NEWLINES 
FORTRAN CONSTANTS 
/* SINGLE SPA 


DOUBLE SPACE 
PAGE SPACE 
OVER PRINT 
PROMPT 


1 
STARDEFMP.SDL;1 16-SEP-1984 16:46:59.46 Page 20 


nodule SPLVDEF ; 
a PRIVILEGED LIBRARY VECTOR DEFINITION 


aggregare PLVDEF structure prefix PLV$; 
TYPE Longword unsigned; 


constant ( 
P_CMOD * GE MODE VECTOR TYPE 
TYP_MSG /*MESSAGE VECTOR TYPE 

equals 1 snereqent 1 prefix PLV tag SC; 
VER SION. lon word mes gree: $ /*SYSTEM VERSION NUMBER 
KERNEL OVERLAY union 

KERNEL npeere a aes /*SELF-REL PTR TO KERNEL MODE DISPATCHER 

MSGDSP | ongvere unsigned; /*SELF-REL PTR TO MESSAGE DISPATCHER 
end KERNEL_OVE 
EXEC longword om | SS /*SELF-REL PTR TO EXEC MODE DISPATCHER 
USRUNDWN Longword uns ign ed; /*SELF-REL PTR TO USER RUNDOWN SERVICE 
FILL.1 Longword fill prefix PLVDEF tag $$; /*UNUSED, RESERVED FOR FUTURE USE 
RMS “Senaeate unsigned; /*SELF-REL PTR TO RMS SERVICES DISPATCHER 
CHECK Longword unsigned; /*LONGWORD USED TO CHECK VIRTUAL ADDRESS 

/*LOCATION OF VECTOR 
end PLVDEF; 


end_module S$PLVDEF; 
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oane SPQLDEF; 
. PROCESS QUOTA LIST CODES 


constant ( 

LISTEND /*LIST BNO CODE (MUST BE FIRST) 

» ASTLM /*AST L MIT 

- BIOL /*BUF FERED 1/9 LIMIT 

» BYTLM /*BYTE LIMIT FOR BUFFERED 1/0 

- CPUL /*CPU TIME LIMIT 

» DIOLM /*DIRECT 1/0 LIMIT 

» FILL /*OPEN FiLe , ou 

» PGFLQUOTA /*PAGING FILE QUOTA 

» PRCLM /*SUB-PROCESS LIMIT 

» TOELM /*TIMER QUEUE ENTRY LIMIT 

» WSQUOTA /*WORKING SET QUOTA 

» WSDEFAULT /*WORKING SET DEFAULT 

» ENQLM /*ENQUEVE LIMIT 

» WSEXTENT /*WORKING SET EXTENT LIMIT 

» JTQUOTA /*JOB-WIDE LOGICAL NAME TABLE CREATION QUOTA 
"LENGTH" /*NUMBER OF QUOTAS (MUST BE LAST) 

§ equals 0 increment 1 prefix PQL tag $; 


end_module S$PQLDEF; 
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module SPRCDEF ; 
oe SCREPRC STATUS FLAGS AND ITEM CODES 


aggregate PRCDEF union prefix PRCS$; 
PRCDEF BITS structure fill; 
SSRWAIT bitfield mask; 
SSFEXCU bist tele mask; 
PSWAPM bitfield mask; 
NOACNT ait iete mask; 
BATCH bitfield mask; 
HIBER bitfield mask; 
AF bitfield mask; 
NETWRK bitfield mask; 
DISAWS bitfield mask; 
DETACH erty tele mask; 
INTER b Fiigte mask; 
IMGDMP bitfield mask; 
CLISPEC bitfield mask; 
NOPASSWORD bitfield mask; 
end PRCDEF BITS; 
PRCDEF OBSOLETE structure fill; 
FICL_O ; tfield Length 6 fill; 
LOGIN bitfield mask; 
end PRCDEF_OBSOLETE; 
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RO 


/e+ 
/t 
a Create Process Item List Data Identifier Definitions 
/t weet NOTE eee 
/t 
/* New items must always be added at the END of the List so that 
a users will not have to relink or reassemble. 
/t- 
constant ( 
LISTEND /* End of List (must be first code) 
- PGFLCHAR /* Page file characteristics 
» PGFLINDEX /* rege le index 
» INPUT_ATT /« SYSSINPUT attributes 
- OUTPUT_ATT /* SYSSOUTPUT attributes 
ERROR_ATT * 


§ equals 0 increment 1 
end_module SPRCDEF; 


/ 
prefix PRC tag $ 


SYSSERROR attributes 


XCEPTION MODE 
ISABLE 


Dd 
ALLING INITIA 
ICATION FOR D 


ET ADJUST 


Ss 
NAME AND PASSWORD 


BYPASS LOGIN VERIFICATION FOR DETACHED PROC. 


1 
STARDEFMP.SDL;1 16-SEP-1984 16:46:59.44 Page 23 


goauye SPRVDEF ; 
. PRIVILEGE BIT DEFINITIONS 


/* Note tha any privite es added here must otag be pernectsé in the 
/* modules [VMSLIB.SRC ; TPRIV.MAR, CCLIUTL.SRCJSHOWPROC.B32, 
/* perk eae LIBLEXICA.B and 
/* CLD.SRCIJDCLINT.CLD NERINT CLD MCRSET.CLD, RUN.CLD, and SET.CLD 
oe to completely add the new pr vilege. 
/t- 
aggregate PRVDEF union prefix PRV$; 
PRVDEF BITSO structure fill; 
RNL bitfield mask; /* MAY CHANGE MODE TO KERNEL 
CMEXEC bitfield mask; /* MAY CHANGE MODE TO EXEC 
/* eeeee THE PRECEEDING TWO BITS MUST BE ADJACENT 
/t weeee THE FOLLOWING TWO BITS MUST BE ADJACENT 
SYSNAM bitfield mask; /* MAY INSERT IN SYSTEM LOGICAL NAME TABLE 
GRPNAM bitfield mask; /* MAY INSERT IN GROUP LOGICAL NAME TABLE 
/* eeeee THE PRECEEDING TWO BITS MUST BE ADJACENT 
ALLSPOOL bitfield mask; /*MAY ALLOCATE SPOOLED DEVICE 
DETACH bitfield mask; /* MAY CREATE DETACHED PROCESSES 
DIAGNOSE bitfield mask; /* MAY DIAGNOSE DEVICES 
LOG_10 bitfield mask; /* MAY DO LOGICAL 1/0 
GROOP bitfield mask; /* MAY AFFECT OTHER PROCESSES IN SAME GROUP 
NOACNT bitfield mask; /* MAY SUPPRESS ACCOUNTING MESSAG 
PRMCEB bitfield mask; /* MAY CREATE PERMANENT COMMON EVENT CLUSTERS 
PRMMBX bitfield mask; /* MAY CREATE PERMANENT MAILBOX 
PSWAPM bitfield mask; /* MAY CHANGE PROCESS SWAP MODE 
SETPRI bitfield mask; /* MAY SET ANY PRIORITY VALUE 
SETPRV bitfield mask; /* MAY SET ANY PRIVILEGE BITS 
TMPMBX bitfield mask; /* MAY CREATE TEMPORARY MAILBOX 
WORLD bitfield mask; /* MAY AFFECT OTHER PROCESSES IN THE WORLD 
T bitfield mask; /* MAY EXECUTE MOUNT ACP FUNCTIONS 
OPER bitfield mask; /* OPERATOR PRIVILEGE 
EXQUOTA bitfield mask; /* MAY EXCEED QUOTAS 
NETMBX bitfield mask; /* MAY CREATE NETWORK DEVICE 
VOLPRO bitfield mask; /* MAY OVERRIDE VOLUME PROTECTION 
PHY_10 bitfield mask; /* MAY DO PHYSICAL I/0 
BUGCHK bitfield mask; /* MAY MAKE BUG CHECK ERROR LOG ENTRIES 
PRMGBL bitfield mask; /* MAY CREATE PERMANENT GLOBAL SECTIONS 
SYSGBL bitfield mask; /* MAY CREATE SYSTEM WIDE GLOBAL SECTIONS 
PFNMAP pis tiete mask; /* MAY MAP TO SECTION BY PFN 
SHMEM b Frietd mask; /* MAY ALLOCATE STRUCTURES IN SHARED MEMORY 
SYSPRV bitfield mask; /* ELIGIBLE FOR SYSTEM PROTECTION FIELD 
BYPASS bitfield mask; /* MAY BYPASS UIC BASED PROTECTION 
SYSLCK pitt iota mask; /* MAY CREATE SYSTEM WIDE LOCKS 
— bitfield mask; * MAY ASSIGN CHANNEL TO NON-SHARED DEVICE 
f The following bits are in the second longword, 
and thus, cannot have prv$m_ symbols... 
UPGRADE bitfield; /* May upgrade classification 
DOWNGRADE bitfield; /* May downgrade classif cation 
GRPPRV bitfield; /* Group access via system protection field 
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READALL ‘ef ietd: /* Read access to everything 
TMPJNL bitfield; /* May create seaperery cuFnals 
sayy bitfield; /* May create perman nt ournals 
SECURITY birtield; /* May perform security functions 
end PRVDEF _BITSO; 
/* weeee THE FOLLOWING TWO BITS MUST BE ADJACENT 
PRVDEF BITS1 eyrur ture 
FICL_1 bit ield le caath % fill prefix PRVDEF tag $$;/* SKIP 9 
ACNT bits e\¢ mask; /* RAY stip ACCOUNTING MESSAGES (NOACNT) 
FILL 2 bitfield le ength 3 fill prefix PRVDEF tag y8:/ 
ALTPRI bitfield ma SAY aS ANY PRIORITY VALE (SETPRI) end 
PRVDEF _BITS1; end 


end 
end PRVDEF 
end_module SPRVDEF; 
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/* PROTECTION FIELD DEFINITIONS 


module SPRIDEF; 


— 
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a 
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= 
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{e+ 


2 MUIWOMMNDD 


ee eee eene 
~S SS 


aaaqaacaqaqaqaaa 


constant NA 
constant Kk 
constant KW 
constant ER 
constant EW 
constant SR 
constant SW 
constant UR 
constant UW 


constant RESERVED 
end_module $PRTDEF; 


constant ERKW 
constant SRKW 
constant SREW 
constant URKW 
constant UREW 
constant URSW 
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module SPRDEF; 


{e+ 
o PROCESSOR REGISTER 
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DEFINITIONS 


constant KSP equals 9 prefix PR tag $; /*KERNEL STACK POINTER 
constant ESP equals prefix PR tag $; /*EXECUTIVE STACK POINTER 
constant SSP equals § prefix PR tag $; /*SUPERVISOR STACK POINTER 
constant USP equals prefix PR tag $; /*USER STACK POINTER 
constant ISP equals 4 prefix PR tag $; /* INTERRUPT STACK POINTER 
constant POBR equals 3 prefix PR tag $; asoe BASE REGISTER 
constant POLR equals prefix PR tag $; /*PQ LIMIT REGISTER 
constant PIBR equals 10 prefix PR tag $; /*P1 BASE REGISTER 
constant PILR equals 11 prefix PR tag $; /*P1 LIMIT REGISTER 
constant SBR equals \§ prefix PR tag $; /*SYSTEM BASE REGISTER 
constant SLR equals 15 prefix PR tag $; /*SYSTEM LIMIT REGISTER 
constant PCBB equals 1 prefix PR tag $; /*PROCESS CONTROL BLOCK BASE 
constant SCBB equals 17 prefix PR tag $; /*SYSTEM CONTROL BLOCK 
constant IPL equals 18 prefix PR tag $; /*INTERRUPT PRIORITY LEVEL REGISTER 
constant ASTLVL equals 19 prefix PR tag $; /*AST LEVEL REGISTER 
constant SIRR equals 20 prefix PR tag $; /*SOFTWARE INTERRUPT REQUEST REGISTER 
constant SISR equals 21 prefix PR tag $; /*SOFTWARE INTERRUPT SUMMARY REGISTER 
constant ICCS equals 24 prefix PR tag $; /* INTERVAL CLOCK CONTROL STATUS REGISTER 
constant RXCS equals ¢ prefix PR tag $; /* CONSOLE RECIEVER CONTROL STATUS REGISTER 
constant RXDB equals prefix PR tag $; /* CONSOLE RECEIVER DATA BUFFER REGISTER 
constant TXCS equals 34 prefix PR tag $; /* CONSOLE TRANSMIT CONTROL STATUS REGISTER 
constant TXDB equals 35 prefix PR tag $; /* CONSOLE TRANSMIT DATA BUFFER REGISTER 
constant MAPEN equals § prefix PR tag $; /* MAPPING ENABLE REGISTER 
constant TBIA equals prefix PR tag $; /* TRANSLATION BUFFER INVALIDATE ALL 
constant TBIS equals 56 prefix PR tag $; /* TRANSLATION BUFFER INVALIDATE SINGLE 
constant SID equals 62 prefix PR tag $; /* SYSTEM IDENTIFICATION REGISTER 
constant TBCHK equals 65 prefix PR tag $; /* TRANSLATION BUFFER VALID CHECK 
sggregate PRDEF union prefix PRS; 
PROEF BITS structure fill; 
SID_SN bitfield Length 12; /* SERIAL NUMBER FIELD 
SID_PL bitfield length 3; /* PLANT ID 
SID-ECO bitfield Length 9: /* ECO LEVEL 
SID-TYPE bitfield Length 8; /* CPU TYPE CODE 
end PROEF_BITS; 
/* SYSTEM REGISTER CPU TYPES 
constant e780 equals 1 prefix PR$_S tag 1D; /* VAX 11/ 
constant TYP7 equals § prefix PR$_S tag ID; /* VAX 11/7 
constant hg equals prefix PR$_S tag ID; /* VAX 11/7 
constant TYP79 equals 4 prefix PR$_S tag ID; /* VAX 11/7 
constant TYP8SS equals 5 prefix PR$_S TAG ID; /* Scorpio for now 
constant TYP equals prefix _5 TAG ID; /* Nautilus for now 
constant TYPMAX equals prefix PR$_S tag ID; /* MAX LEGAL CPU TYPE 
/* Micro-VAX cpus 
constant TYPUV1 equals 7 prefix PR$_S tag ID; /* Micro-VAX UV1 
constant TYPUV2 equals 8 prefix PR$_S tag ID; /* \er9r AX UV2 
/*VAX 11/780 IPR'S: 
constant WCSA equals 44 prefix PR tag $; /* WCS ADDRESS REGISTER 
constant WCSD equals 45 prefix PR tag $; /* WCS DATA REGISTER 


eef 


constant 
constant 
constant 
constant 
constant 
constant 
constant 


constant 
constant 
constant 
constant 
constant 
constant 
constant 
constant 


constant CAE 


constant 


constant 
constant 
constant 
constant 


constant MENA 


constant 
constant 
constant 
constant 
constant 
constant 
constant 
constant 
constant 
constant 
constant 


end PRDEF ; 


end_module $PRDEF; 
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module SPR730DEF; 


r+ 
{: 11/730-Specific Processor Register Definitions 


constant NICR equals 25 prefix PR730 tag $; /* INTERVAL CLOCK NEXT INTERVAL REGISTER 
constant ICR equals § prefix PR730 tag $; /* INTERVAL CLOCK INTERVAL COUNT REGISTER 
constant TODR equals prefix PR730 tag $; /* TIME OF DAY REGISTER 

constant ACCS equals 40 prefix PR730 tag $; /* ACCELERATOR CONTROL STATUS REGISTER 
constant ACCR equals 41 prefix PR730 tag $: /* ACCELERATOR RESERVED 

constant PME equals 61 prefix PR730 tag $; /* PERFORMANCE MONITOR ENABLE 

constant CMIERR equals 23 prefix PR7 8 tag $; /* CMI ERROR SUMMARY REGISTER 

constant CSRS equals 28 prefix PR730 tag $; /* CONSOLE BLK STORE RCV STATUS 

constant CSRD equals 29 prefix PR730 tag $; /* CONSOLE BLK STORE RCV DATA 

constant CSTS equals 50 prefix PR730 tag $; /* CONSOLE BLK STORE XMIT STATUS 
constant CSTD equals 31 prefix PR730 tag $; /* CONSOLE BLK STORE XMIT DATA 

constant TBDR equals 36 prefix PR730 tag $; /* TB DISABLE REGISTER 

constant CADR equals 37 prefix PR730 tag $; /* CACHE DISABLE REGISTER 

constant MCESR equals 38 prefix PR730 tag $; /* MACHINE CHECK ERROR SUMMARY REG 
constant CAER equals 39 prefix PR730 tag $; /* CACHE ERROR REGISTER 

constant UBRESET equals 55 prefix PR730 tag $; /* UNIBUS 1/0 RESET REGISTER 


end_module S$PR730DEF ; 
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module SPR7SODEF; 


+ 
‘: 11/750-Specific Processor Register Definitions 


constant NICR equals 25 prefix PR750 tag $; /* INTERVAL CLOCK NEXT INTERVAL REGISTER 
constant ICR equals § prefix PR750 tag $; /* INTERVAL CLOCK INTERVAL COUNT REGISTER 
constant TODR equals prefix PR750 tag $; /* TIME OF DAY REGISTER 

constant ACCS equals 40 prefix PR750 tag $; /* ACCELERATOR CONTROL STATUS REGISTER 
constant ACCR equals 41 prefix PR750 tag $; /* ACCELERATOR RESERVED 

constant PME equals 61 prefix PR750 tag $; /* PERFORMANCE MONITOR ENABLE 

constant CMIERR equals $3 prefix PR750 tag $; /* CMi ERROR SUMMARY REGISTER 

constant CSRS equals prefix PR750 tag $; /* CONSOLE BLK STORE RCV STATUS 

constant CSRD equals 29 prefix PR750 tag $; /* CONSOLE BLK STORE RCV DATA 

constant CSTS equals 50 prefix er ee8 tag $; /* CONSOLE BLK STORE XMIT STATUS 
constant CSTD equals 31 prefix PR750 tag $; /* CONSOLE BLK STORE XMIT DATA 

constant TBDR equals 36 prefix ene 28 tag $; /* TB DISABLE REGISTER 

constant CADR equals 37 prefix PR750 tag $; /* CACHE DISABLE REGISTER 

constant MCESR equals 38 prefix PR750 tag $; /* MACHINE CHECK ERROR SUMMARY REG 
constant CAER equals 39 prefix PR750 tag $; /* CACHE ERROR REGISTE 

constant UBRESET equals 55 prefix PR750 tag $; /* UNIBUS I/O RESET RE 


AAA AAAAAAPAAAAASAAAPAAAAAAAAAAAAAPAPAAPAAAAAAAAAAAAAAAAA 


R 
GISTER 
end_module $PR75ODEF ; 
| 
| 
| 
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module $PR780DEF ; 


e+ 
f 11/780-Specific Processor Register Definitions 


constant NICR equals 25 prefix PR780 tag $; /* 
constant ICR equals § prefix PR780 tag $; /* 
constant TODR equals prefix PR780 tag $; /* 
constant ACCS equals 40 prefix PR780 tag $; /* 
constant ACCR equals 41 prefix PR? 8 tag $; /* 
constant PME equals 61 prefix PR780 tag $; /* 
constant WCSA equals 44 prefix PR780 tag $; /* 
constant WCSD equals 45 prefix PR780 tag $; /* 
constant SBIFS equals 48 prefix PR7 8 tag $; /* 
constant SBIS equals 49 prefix PR780 tag $; /* 
constant SBISC equals 50 prefix PR7 tag $; /* 
constant SBIMT equals 51 prefix PR780 tag $; /* 
constant SBIER equals ¢ prefix PR780 tag $; /* 
constant SBITA equals prefix pnre tag $; /* 
constant SBIQC equals 54 prefix PR780 tag $; /* 


end_module $SPR780DEF ; 
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module SPR790DEF; 


e+ 
{ 11/790-Specific Processor Register Definitions 


constant NICR equals 25 prefix PR790 tag $; /* INTERVAL CLOCK NEXT INTERVAL REGISTER 
constant ICR equals § prefix PR790 tag $; /* INTERVAL CLOCK INTERVAL COUNT REGISTER 
constant TODR equals prefix PR790 tag $; /* TIME OF DAY REGISTER 

constant ACCS equals 40 prefix PR790 tag $; /* ACCELERATOR CONTROL STATUS REGISTER 
constant ACCR equals 41 prefix ad8 44 tag $; /* ACCELERATOR RESERVED 

constant PME equais 61 prefix PR790 tag $; /* PERFORMANCE MONITOR ENABLE 

constant PAMACC equals 64 prefix PR790 tag $; /* PAMM ACCESS 

constant PAMLOC equals 65 prefix PR790 tag $; /* PAMM LOCATION 

constant CSWP equals $6 prefix PR790 tag $; /* CACHE SWEEP REGISTER 

constant MDECC equals 67 prefix PR790 tag $; /* MBOX DATA ECC REGISTER 

constant MENA equals 68 prefix PR790 tag $; /* MBOX ERROR ENABLE REGISTER 

constant MDCTL equals 34 prefix PR790 tag $; /* MBOX DATA CONTROL REGISTER 

constant MCCTL equals 70 prefix PR790 tag $; /* MBOX MCC CONTROL REGISTER 

constant MERG equals 71 prefix PR790 tag $; /* MBOX ERROR GENERATOR REGISTER 
constant CRBT equals ie; prefix PR790 tag $; /* CONSOLE REBOOT 

constant DFI equals 75 prefix PR790 tag $; /* DIAGNOSTIC FAULT INSERTION 

constant EHSR equals 74 prefix PR790 tag $; /* ERROR HANDLING STATUS REGISTER 
constant ACCS790 equals 75 prefix PR790 tag $; /* ACCELERATOR STATUS REGISTER 
constant STXCS equals 76 prefix PR790 tag $; /* CONSOLE STORAGE CONTROL REG 
constant STXDB equals 77 prefix PR790 tag $; /* CONSOLE STORAG EGISTER 
constant LSPA equals 78 prefix PR790 tag $; /* SCRATCHPAD ADDRESS 

constant RSPD equals 79 prefix PR790 tag $; /* SCRATCHPAD DATA 


end_module $SPR790DEF ; 
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module SPRUVIDEF; 


e+ 
‘ Micro-VAX I Processor-specific Register Definitions 


constant CADR equals 37 prefix PRUV] tag $; /* CACHE DISABLE REGISTER 
constant MCESR equals 3 prefix PRUV1 tag $; /* MACHINE CHECK ERROR SUMMARY REG 
constant IORESET equals 55 prefix PRUV1 tag $; /* INITIALIZE BUS REGISTER 


end_module SPRUVIDEF ; 
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module SPRUV2DEF ; 


r+ 
‘: Micro-VAX II Processor-specific Register Definitions 


constant SAVISP equals 41 prefix PRUV2 tag $; /* CONSOLE SAVED INTERRUPT STACK POINTER 
constant SAVPC equals 42 prefix PRUV2 tag $; /* CONSOLE SAVED Fc REGISTER 

constant SAVPSL equals 45. prefix PRUV2 tag $; /* CONSOLE SAVED PSL REGISTER 

constant IORESET equals 55 prefix PRUV2 tag $; /* INITIALIZE BUS REGISTER 


end_module $PRUV2DEF ; 
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module SPRB&NNDEF; 


+ 
‘: 11/8NN=Specific Processor Register Definitions 


constant NICR equals 25 prefix PR8NN tag $; /* 
constant ICR equals § prefix PR8NN tag $; /* 
constant TODR equals prefix PR tag $; /* 
constant PME equals 61 prefix PR8NN tag $; /* 
constant MCSTS equals prefix PR8NN tag $; /* 
constant NMION equals 8 prefix PR8NN tag $; /* 
constant INOP equals 1 prefix PR8NN tag $; /* 
constant NMIFSR equals 1 prefix PR8NN tag $; /* 
constant NMISILO equals 151 prefix PR8NN tag $; /* 
constant NMIEAR equals 1 prefix PR8NN tag $; /* 
constant CCR equals 1 prefix PR8NN tag $; /* 
constant REVR1 equals 154 prefix PRBNN tag $; /* 
constant REVR2 equals 155 prefix PR8NN tag $; /* 


end_module SPR8NNDEF ; 
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module SPRBSSDEF; 


e+ 
{ 11/8SS-Specific Processor Register Definitions 


™~™ 8 8 se 8 8 ee ee 8 


constant IPIR equals g prefix PR8SS tag $; /* Interprocessor Interrupt a 
constant NICR equals prefix PR8SS tag $; /* Interval Clock Next Interval Register 
constant ICR equals § prefix PR8SS tag $; /* Interval Clock Interval Count Register 
constant TODR equals prefix PR8SS tag $; /* Time Of Day Req ster 

constant TBDR equals § prefix PR8SS tag $; /* Translation Buffer Disable Register 
constant CADR equals prefix PR8SS tag $; /* Cache Disable Register 

constant MCESR equals 5 prefix PR8SS tag $; /* Machine Check Error Summary Register 
constant ACCS equals 40 prefix PR8SS tag $; /* Floating Point Accellerator Register 
constant WCSA equals 44 prefix PR8SS tag $; /* WCS Address beg tater agg 
constant WCSD equals 45 prefix PR8SS tag $; /* WCS Data Register 

constant WCSC equals 46 prefix PR8SS tag $; /* WCS Cam Register 

constant PME equals 61 prefix PR8SS tag $; /* Performance Monitor Enable 

constant RXCS1 equals 80 prefix PR8SS tag $; /* Serial Line 1 Receive CSR 

constant RXDB1 equals 81 prefix PR8SS tag $; /* Serial Line 1 Receive Data Buffer 
constant TXCS1 equals ¢ prefix PR8SS tag $; /* Serial Line 1 Transmit CSR 

constant TXDB1 equals prefix PR8SS tag $; /* Serial Line 1 Transmit Data Buffer 
constant RXCS2 equals 84 prefix PR8SS tag $; /* Serial Line 2 Receive CS 

constant RXDB2 equals 85 prefix PR8SS tag $; /* Serial Line 2 Receive Data Buffer 
constant TXCS2 equals 6 prefix PR8SS tag $; /* Serial Line 2 Transmit CSR 

constant TXDB2 equals prefix PR8SS tag $; /* Serial Line 2 Transmit Data Buffer 
constant RXCS5 equals prefix PR8SS tag $; /* Serial Line 3 Receive CS 

constant RXDB3 equals prefix PR8SS tag $; /* Serial Line 35 Receive Data Buffer 
constant TXCS5 equals 90 prefix PR8SS tag $; /* Serial Line 3 Transmit CSR 

constant TXDB5 equals 91 prefix PR8SS tag $; /* Serial Line 3 Transmit Data Buffer 
constant RXCD equals 4 prefix PR8SS tag $; /* Receive Console Data Register 
constant CACHEX equals 95 prefix PR8SS tag $; /* Cache Invalidate Register 

constant BINID equals 94 prefix PR8SS tag $; /* e ID Register 

constant BIINIT equals 95 prefix PR8SS tag $; /* BI Init Nodes Register 

aggregate PRESSDEF union prefix PR8SSS$; 

PR8SSSID_BITS structure fill; /* Read only SID register 
SID_OCREV bitfield Length 8; /* Ucode Revision Level 
SID_SECP bitfield mask; /* Secondary Patch Bit 
SID-PATREV bitfield Length 10; /* Patch Rev Level 
SID_CPUREV bitfield Length 3: /* CPU Rev Level 
SID_TYPE bitfield Length 8; /* CPU Type Code 

end PR8SSSID_BITS; 

PRESSRXCS_BITS structure fill; /* Console RCV CSR 
FILL_T bitfield length 6 fill prefix PR8SS tag $$;/* 

RXCS_IE bitfield mask; /* jnterrust Enable 
ns DONE bitfield mask; /* 1=> Char. received 

end PRASSRXCS_BITS; 

PRESSRXDB_BITS structure fill; /* Console RCV Data Register 
RXDB_BATA bitfield Length 8; /* Received Data 
FILL_2 bitfield length 7 fill prefix PR8SS tag $$;/* 
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STARDEFMP.SDL;1 
expe ERR bitfield mask; /* Error 

end PR8SSRXDB_BITS; 

PRESSTXCS_BITS etrycpure ft + ceneote Transmit CSR 
FILL_3 bitf eld Length é Hut prefix PR8SS tag $$: 
IXCScIE bitfield mask; /* Interrupt Enable 
TXCS_RDY bitfield aeons /* 
TXCS_BRE bitfield /* C835 "paud Rate Enable 
FILL_4 pi tr iex? len th ‘ fill prefix PR8SS tag be 1 /* 
TXCS_BAUD bitfield length 3; * Baud Rate 

ie Values to set_baud rates 

constant BA? 8 equals 9 prefix PR8SS tag $;/* Baud Rate of 
constant BAUD equals prefix PR8SS tag $;/* Baud Rate of 
constant BAUD 8 equals § prefix PR8SS tag $;/* Baud Rate of 0 
constant BAUD2 equals prefix PR8SS tag $;/* Baud Rate of 2 3 
constant BAUD4800 equals 4 prefix PR8SS tag $;/* Baud Rate of 3e5 
constant BAUD9600 equals 5 prefix PR8SS tag $;/* Baud Rate of 96 8 
constant BAUD19200 equals § prefix PR8SS tag $;/* Baud Rate of 19200 
constant BAUD38400 equais prefix PR8SS tag $;/* Baud Rate of 38400 


end PR8SSTXCS_BITS; 

ages, ay a struc 
TXDB_BAT bi 

TXDBTID bitf 


constant BOOTCPU equals ¢ prefix PR8SS tag $ 
penesens CLRWARM equals prefix PR8SS tag $ 
onstant CLRCOLD equals 4 prefix PR8SS tag $ 

end PRESSTXDB BITS; 


ences)" BITS structure fill; 
CADR_B bitfield mask; 
CADR_H bit field mask; 
end PRESSCADR.B BITS; 


PRESSWCSA Bits structure fill; 
WCSA_BAT bitfield Lengt 


h 8; 
FILL_4 bittieud length 8 AL prefix PR8SS tag $8; /* 


R bitfield length 16; 


WCSA_RAMADR 
end PRESSUCSA BITS; 


/* Console Transmit Data Register 
* Data to Transmit 

* ID - Rook tant tan of 

* transmitted data - 

* Q=>UARTO, F=>Console 
/* command 

* Possible Console Commands 

* Boot CPU Command 

* Clear Warm-start Flag 

* Clear Cold-start Flag 


/* Cache Disable Register 
/* Disable Cache 
/* Force 100% Cache Hits 


. WCS (Patch) Address Reg 
* High Order Data Bits 
* Ram Address 


* WCS (Patch) CAM Reg 


* Cam Address 
ie Rom Address 


/* Receive Console Data Register 
/* Received Data 
/* jeancer” s Node ID 


PR8SSWCSC_BITS etructure fill; 
FILL_5 bitfield Length 8 fill prefix PR8SS tag $$: /* 
ty “pues bitfield length 
wcsceR OMADR bitfield Length a; 
end PR SSwCSC_B BITS; 
PRESSRXCD_BITS structure fill; 
RXCD_BATA bitfield Length 
RXC =f008 10 bitfield length 
FILL_6 b thtete bength 3 fill fer PR8SS tag $$;/ 
RXCD_BSY bitfield mask; 


/* ate >Data has been received 
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end PR&SSRXCD i 


PasPatLeP Bk structure f tT * Cache Invalidate Register 
Held length 9 f ft prefix PR8SS tag $$; /* 
CACHEX N bitfield Length * Physical Page Number 
end PR OS CKCH HEX BITS; 
rassaeivie BITS structure fill; /* BI Node ID Register 
D_RID bitfield | Length i; /* BI Node ID this node 
end PROSSBINID B ITS; 


end PR&SSDEF 
end_module SPRASSDEF; 
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module SPSLDEF; 


{xe 
o PROCESSOR STATUS LONGWORD MASK AND FIELD DEFINITIONS 


eoargpate PSLDEF union prefix PSLS$; 
F_ BITS structure fill; 
C Bittield mask; /* Carr 
V bitfield mask; /* oVerflow 
Z bitfield mask; /* Zero 
N bitfield mask; /* wepetive 
TBIT bitfield mask; /* TBIT ENABLE 
IV bitfield mask; /* INTEGER OVERFLOW 
FU bitfield neehs /* FLOATING UNDEFINED 
DV bitfield m /* DIVIDE BY ZERO 
FILL.1 bitfield slengeh, 8 fill prefix PSLDEF tag $$;/* 
IPL Bittield. mask Len /* INTERRUPT PRIORITY LEVEL 
FILL_2 bitfield fill prefix ee.nee tag $$; /t 
PRVMOD bitfield mask ength /* PREVIOUS PROCESSOR MODE 
CURMOD bitfield mask length /* CURRENT PROCESSOR MODE 
IS bitfield mas — /* INTERRUPT STACK BIT 
FPD bitfield ma /* FIRST PA 
FILL_3 bitfield. Length 2 fill prefix PSLDEF tag $$;/* ry ge ans 
TP bitfield mas * TRACE T PENDING 
CM bitfield mask: /* COMPATIBILITY MODE BIT AND MASK 
end PSLDEF _BITS; 
a 
is MODE SYMBOL DEFINITIONS 
® 
RNEL /* KERNEL MODE 
» EXEC /* EXEC M 
« SUPER /* SUPERVISOR MODE 
/* USER MODE 


USER 
j equals 0 increment 1 prefix PSL tag $C; 
constant SAFBITS equals 
( PSLSM_CR (P PSL $mM_TP! 
Sigits FPb)a(-16)) se 
prefix PSL tag $M; 
end PSLDEF; 
end_module $PSLDEF; 
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